(set-face-font-auto): Create a fontset if FONT is a

fontset not instanciated fontset.

diff --git a/lisp/faces.el b/lisp/faces.el
index 0641a1695e09b4b930afc58f6740bb376c3e9e5f..f925daa6e704940491edfe6d2929197d3aea7cf3 100644 (file)
--- a/lisp/faces.el
+++ b/lisp/faces.el
@@ -173,7 +173,9 @@ If the optional FRAME argument is provided, change only
 in that frame; otherwise change each frame."
   (interactive (internal-face-interactive "font"))
   (if (stringp font)
-      (setq font (or (query-fontset font)
+      (setq font (or (and (fontset-name-p font)
+                         (or (query-fontset font)
+                             (instanciate-fontset font)))
                     (x-resolve-font-name font 'default frame))))
   (internal-set-face-1 face 'font font 3 frame))